home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 001a / com_and4.zip / TESTVOIC.CMD < prev    next >
OS/2 REXX Batch file  |  1990-03-15  |  491b  |  17 lines
  1. ;
  2. ;    Say something if voice driver is loaded
  3. ;
  4.    IF FIND "_OVER" "talker."                    ; If overlay is talker,
  5.       N0 = 100                    ; Set voice pitch
  6.       SCALL 18,N0                ; .. to 100 Hz
  7.       N0 = 100                    ; Set voice rate
  8.       SCALL 15,N0                ; .. to 100 wps
  9.       S0 = "Ay kaen tawk"                       ; Set phonetic string
  10.       SCALL 3,S0                ; Speak phonetic string
  11.       ENDIF
  12. ;
  13. ;    And return
  14. ;
  15.    IF FCALLED FRET                ; Return if called
  16.    EXIT                     ; Else, stop
  17.